﻿namespace fifteen_puzzle

open System
open System.Windows

module Main =

    [<STAThread>]
    [<EntryPoint>]
    do
        let application = Application.LoadComponent(new Uri("App.xaml", UriKind.Relative)) :?> Application
 
        // Ensure window can be processed
        application.Activated
        |> Event.add (fun _ -> MainWindow.initControls application.MainWindow)
 
        application.Run() |> ignore
